home *** CD-ROM | disk | FTP | other *** search
/ Tricks of the Mac Game Programming Gurus / TricksOfTheMacGameProgrammingGurus.iso / More Source / C⁄C++ / Xconq 7.0d37 / lib / ww2s-42.g < prev    next >
Encoding:
Text File  |  1995-05-04  |  1.3 KB  |  79 lines  |  [TEXT/MPS ]
  1. (game-module "ww2s-42"
  2.   (title "WWII (Std), Jan 42")
  3.   (blurb "The world in January 1942 (based on types from standard game)")
  4.   (base-module "ww2-stdunit")
  5.   (variants (see-all true))
  6.   )
  7.  
  8. ;;; (should have Axis and Allies sides only)
  9.  
  10. (add u* start-with 0)
  11. (add u* independent-near-start 0)
  12.  
  13. (set synthesis-methods nil)
  14.  
  15. (include "earth-1deg")
  16.  
  17. (scorekeeper (do last-side-wins)) ; for now
  18.  
  19. ;;; Sides.
  20.  
  21. (side 1 (name "Allies"))
  22.  
  23. (side 2 (name "Axis"))
  24.  
  25. (set sides-min 2)
  26. (set sides-max 2)
  27.  
  28. ;;; Units.
  29.  
  30. (define capital city)
  31.  
  32. ;; This maps countries to allies or axis.
  33.  
  34. (define uk 1)
  35. (define fr 2)
  36. (define us 1)
  37. (define de 2)
  38. (define it 2)
  39. (define jp 2)
  40. (define su 1)
  41. (define zh 1)
  42. (define es 0)
  43.  
  44. (include "u-e1-1938")
  45.  
  46. ;; Changes for 1942.
  47. ;; (should be in a generic 1942 status file)
  48.  
  49. ;; Douala is Free French.
  50.  
  51. (unit "Douala" (s 1))
  52.  
  53. ;; Axis conquests.
  54.  
  55. (unit "Athens" (s 2))
  56. (unit "Brussels" (s 2))
  57. (unit "Bucharest" (s 2))
  58. (unit "Copenhagen" (s 2))
  59. (unit "Kiev" (s 2))
  60. (unit "Minsk" (s 2))
  61. (unit "Odessa" (s 2))
  62. (unit "Prague" (s 2))
  63. (unit "Riga" (s 2))
  64. (unit "Rotterdam" (s 2))
  65. (unit "Sofia" (s 2))
  66. (unit "Thessaloniki" (s 2))
  67. (unit "Vienna" (s 2))
  68. (unit "Vilnius" (s 2))
  69. (unit "Warsaw" (s 2))
  70. (unit "Zagreb" (s 2))
  71.  
  72. (unit "Beijing" (s 2))
  73. (unit "Nanjing" (s 2))
  74. (unit "Tianjin" (s 2))
  75. (unit "Wuhan" (s 2))
  76. (unit "Nanchang" (s 2))
  77. (unit "Taipei" (s 2))
  78. (unit "Kaohsiun" (s 2))
  79.